﻿Imports System
Imports System.Reflection

Namespace System.Workflow.Activities.Rules
    Friend Class RuleConstructorExpressionInfo
        Inherits RuleExpressionInfo
        ' Methods
        Friend Sub New(ByVal ci As ConstructorInfo, ByVal needsParamsExpansion As Boolean)
            MyBase.New(ci.DeclaringType)
            Me.constructorInfo = ci
            Me.needsParamsExpansion = needsParamsExpansion
        End Sub


        ' Properties
        Friend ReadOnly Property ConstructorInfo As ConstructorInfo
            Get
                Return Me.constructorInfo
            End Get
        End Property

        Friend ReadOnly Property NeedsParamsExpansion As Boolean
            Get
                Return Me.needsParamsExpansion
            End Get
        End Property


        ' Fields
        Private constructorInfo As ConstructorInfo
        Private needsParamsExpansion As Boolean
    End Class
End Namespace

